home *** CD-ROM | disk | FTP | other *** search
/ Fun Clips 2 / Fun Clips 2.iso / gfxmanager / install < prev    next >
Encoding:
Text File  |  1996-08-08  |  4.0 KB  |  136 lines
  1. ; $VER: Install.script V1.1 (11.8.95)
  2. ; © 1995 by Thomas Treder / Nightshift.
  3. ; This is the Amiga-Installer Script for GFXManager
  4.  
  5.  
  6. ;***** Set Language
  7.  
  8. (set selectlang (askchoice
  9.                    (prompt "")
  10.                    (help @askchoice-help)
  11.                    (choices "Deutsche Installation" "English Installation")
  12.                    (default 0)
  13.                  )
  14. )
  15.  
  16. (if (= selectlang 0)
  17.  (set @language "deutsch")
  18.  (set @language "english")
  19. )
  20.  
  21. (if (= @language "deutsch")
  22.  
  23.   (
  24.     (set MSG_wrong_OS        (cat "Sie benötigen mindestens OS V2.04 \nzum starten des GFXManager !\n\n"
  25.                                   "GFXManager wird auf Ihrem System nicht laufen !"))
  26.     (set MSG_Installing           "Installiere jetzt GFXManager !")
  27.     (set MSG_SelectPath           "Wählen Sie bitte das Zielverzeichnis für GFXManager \n\(Das Verzeichnis `GFXManager` wird autom. erzeugt !\)")
  28.     (set MSG_EditStartup          "Es werden einige benötigte Anweisungen in die Datei \"s:user-startup\" eingetragen.")
  29.     (set MSG_InstallLibs          "Installiere IXEmul.Library ...")
  30.     (set MSG_InstallFonts         "Installiere Zeichensätze ...")
  31.     (set MSG_ChoiceTitle          "Verfügt Ihr Rechner über einen Fließkommaprozessor ?")
  32.     (set MSG_Choice               "Keine FPU")
  33.     (set MSG_DeleteOld            "Lösche alte Dateien ...")
  34.   )
  35.   (
  36.     (set MSG_wrong_OS        (cat "You need at least OS V2.04 to run GFXManager !\n\n"
  37.                                   "GFXManager will not run with your system configuration !"))
  38.     (set MSG_Installing           "Installing GFXManager now !")
  39.     (set MSG_SelectPath           "Select path to install GFXManager to \nThe drawer `GFXManager` will be autom. created !")
  40.     (set MSG_EditStartup          "Some required commands will be added to your \"s:user-startup\" file.")
  41.     (set MSG_InstallLibs          "Installing IXEmul.Library ...")
  42.     (set MSG_InstallFonts         "Installing Fonts ...")
  43.     (set MSG_ChoiceTitle          "Is your Computer equiped with a FloatingPointUnit ?")
  44.     (set MSG_Choice               "NO FPU")
  45.     (set MSG_DeleteOld            "Deleting old files ...")
  46.   )
  47. )
  48.  
  49. (set OS_VER (/ (getversion) 65536) )
  50.  
  51. (if(< OS_VER 37)
  52.   (abort MSG_wrong_OS)
  53. )
  54.  
  55. ;***** Copy Files
  56. (complete 0)
  57.  
  58. (copyfiles
  59.   (prompt MSG_Installing)
  60.   (help @copyfiles-help)
  61.   (source "")
  62.   (set pmcomdir
  63.               (askdir
  64.                      (prompt MSG_SelectPath)
  65.                      (help @askdir-help)
  66.                      (newpath)
  67.                      (default "SYS:")
  68.               )
  69.   )
  70.   (if (patmatch "#?GFXManager" pmcomdir)
  71.       (
  72.           (set Destination pmcomdir)
  73.       )
  74.       (
  75.           (set Destination (tackon pmcomdir "GFXManager"))
  76.       )
  77.    )
  78.   (dest Destination)
  79.   (pattern "~(Font#?|Libs#?|Install#?)")
  80.   (optional ("nofail") ("askuser"))
  81.   (infos)
  82.   (confirm)
  83. )
  84.  
  85. ;***** Install Fonts
  86. (complete 65)
  87.  
  88. (copyfiles
  89.   (prompt MSG_InstallFonts)
  90.   (help @copyfiles-help)
  91.   (source "Fonts")
  92.   (dest "Fonts:")
  93.   (all)
  94.   (optional ("nofail") ("askuser"))
  95.   (confirm)
  96. )
  97. (set @default-dest (expandpath pmcomdir))
  98.  
  99. ;***** Copy Library
  100. (complete 70)
  101.  
  102. (copylib
  103.         (prompt MSG_InstallLibs)
  104.         (help @copylib-help)
  105.         (source "Libs/ixemul.library")
  106.         (dest "Libs:")
  107.         (optional ("nofail") ("askuser"))
  108. )
  109.  
  110. ;***** Edit Startup-Sequence
  111. (complete 90)
  112.  
  113. (startup "GFXManager"
  114.         (prompt MSG_EditStartup)
  115.         (help @startup-help)
  116.  
  117.         (command "if exists \"" Destination "\"\n")
  118.         (command "   assign >NIL: GFXManager: \"" Destination "\"\n")
  119.         (command "   assign >NIL: GMData: GFXManager:GMData\n")
  120.         (command "   if exists GFXManager:bin\n")
  121.         (command "      path >NIL: GFXManager:bin add\n")
  122.         (command "      assign >NIL: C: GFXManager:bin add\n")
  123.         (command "   endif\n")
  124.         (command "endif")
  125. )
  126.  
  127. (makeassign "GFXManager" Destination (safe))
  128. (makeassign "GMData" "GFXManager:GMData" (safe))
  129. (run "assign >NIL: C: GFXManager:bin add")
  130. (run "path >NIL: GFXManager:bin add")
  131.  
  132. ;***** Finished
  133. (complete 100)
  134.  
  135.  
  136.